object frmShowClient: TfrmShowClient
  Left = 0
  Top = 0
  ClientHeight = 480
  ClientWidth = 1025
  Caption = #23458#25143#32534#21495
  OldCreateOrder = False
  MonitoredKeys.Keys = <>
  OnCreate = UniFormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object UniToolBar1: TUniToolBar
    Left = 0
    Top = 0
    Width = 1025
    Height = 45
    Hint = ''
    ButtonHeight = 45
    ButtonWidth = 60
    ShowCaptions = True
    TabOrder = 0
    ParentColor = False
    Color = clBtnFace
    object tbQuery: TUniToolButton
      Left = 0
      Top = 0
      Hint = ''
      ImageIndex = 10
      Caption = #26597#35810
      TabOrder = 1
      OnClick = tbQueryClick
    end
    object UniToolButton2: TUniToolButton
      Left = 60
      Top = 0
      Width = 8
      Hint = ''
      Style = tbsSeparator
      Caption = 'UniToolButton2'
      TabOrder = 2
    end
    object tbOK: TUniToolButton
      Left = 68
      Top = 0
      Hint = ''
      ImageIndex = 7
      Caption = #30830#23450
      TabOrder = 4
      OnClick = tbOKClick
    end
    object tbClear: TUniToolButton
      Left = 128
      Top = 0
      Hint = ''
      ImageIndex = 8
      Caption = #28165#38500
      TabOrder = 5
      OnClick = tbClearClick
    end
    object UniToolButton4: TUniToolButton
      Left = 188
      Top = 0
      Width = 8
      Hint = ''
      Style = tbsSeparator
      Caption = 'UniToolButton4'
      TabOrder = 6
    end
    object tbClose: TUniToolButton
      Left = 196
      Top = 0
      Hint = ''
      ImageIndex = 41
      Caption = #20851#38381
      TabOrder = 3
      OnClick = tbCloseClick
    end
  end
  object UniPanel3: TUniPanel
    Left = 0
    Top = 45
    Width = 1025
    Height = 55
    Hint = ''
    Align = alTop
    TabOrder = 1
    Caption = ''
    object edSiteFlags: TUniEdit
      Left = 210
      Top = 15
      Width = 60
      Hint = ''
      Text = ''
      TabOrder = 1
    end
    object UniLabel1: TUniLabel
      Left = 180
      Top = 20
      Width = 24
      Height = 13
      Hint = ''
      Caption = #32452#32455
      TabOrder = 4
    end
    object edClientNo: TUniEdit
      Left = 70
      Top = 15
      Width = 80
      Hint = ''
      Text = ''
      TabOrder = 0
    end
    object UniLabel2: TUniLabel
      Left = 18
      Top = 20
      Width = 48
      Height = 13
      Hint = ''
      Caption = #23458#25143#32534#21495
      TabOrder = 5
    end
    object edClientName: TUniEdit
      Left = 360
      Top = 15
      Width = 200
      Hint = ''
      Text = ''
      TabOrder = 2
    end
    object UniLabel3: TUniLabel
      Left = 308
      Top = 20
      Width = 48
      Height = 13
      Hint = ''
      Caption = #23458#25143#21517#31216
      TabOrder = 6
    end
  end
  object UniPanel2: TUniPanel
    Left = 0
    Top = 100
    Width = 1025
    Height = 380
    Hint = ''
    Align = alClient
    TabOrder = 2
    Caption = ''
    object UniDBGrid1: TUniDBGrid
      Left = 1
      Top = 1
      Width = 1023
      Height = 378
      Hint = ''
      DataSource = dscli_mst
      ReadOnly = True
      LoadMask.Message = 'Loading data...'
      Align = alClient
      TabOrder = 1
      OnDblClick = UniDBGrid1DblClick
      Columns = <
        item
          FieldName = 'cli_site_flags'
          Title.Alignment = taCenter
          Title.Caption = #32452#32455
          Width = 50
        end
        item
          FieldName = 'cli_no'
          Title.Alignment = taCenter
          Title.Caption = #23458#25143#32534#21495
          Width = 100
        end
        item
          FieldName = 'cli_name'
          Title.Alignment = taCenter
          Title.Caption = #23458#25143#21517#31216
          Width = 200
        end
        item
          FieldName = 'cli_short_name'
          Title.Alignment = taCenter
          Title.Caption = #31616#31216
          Width = 100
        end
        item
          FieldName = 'cli_area_no'
          Title.Alignment = taCenter
          Title.Caption = #29255#21306#32534#21495
          Width = 60
        end
        item
          FieldName = 'cli_area_name'
          Title.Alignment = taCenter
          Title.Caption = #29255#21306#21517#31216
          Width = 80
          ReadOnly = True
        end
        item
          FieldName = 'cli_off_no'
          Title.Alignment = taCenter
          Title.Caption = #22806#21150#32534#21495
          Width = 52
        end
        item
          FieldName = 'cli_off_name'
          Title.Alignment = taCenter
          Title.Caption = #21150#20107#22788#21517#31216
          Width = 100
          ReadOnly = True
        end
        item
          FieldName = 'cli_pre_contract'
          Title.Alignment = taCenter
          Title.Caption = #21069#32512
          Width = 50
        end
        item
          FieldName = 'cli_contract'
          Title.Alignment = taCenter
          Title.Caption = #31614#32422#24207#21495
          Width = 200
        end
        item
          FieldName = 'cli_special_a'
          Title.Alignment = taCenter
          Title.Caption = #31614#32422#20195#29702#20215
          Width = 100
        end
        item
          FieldName = 'cli_special_b'
          Title.Alignment = taCenter
          Title.Caption = #31614#32422#22806#20215#26684
          Width = 100
        end
        item
          FieldName = 'cli_flags'
          Title.Alignment = taCenter
          Title.Caption = #29366#24577
          Width = 50
          ReadOnly = True
        end
        item
          FieldName = 'adds_province'
          Title.Alignment = taCenter
          Title.Caption = #30465
          Width = 80
          ReadOnly = True
        end
        item
          FieldName = 'adds_locality'
          Title.Alignment = taCenter
          Title.Caption = #24066
          Width = 80
          ReadOnly = True
        end
        item
          FieldName = 'adds_county'
          Title.Alignment = taCenter
          Title.Caption = #21306'('#21439')'
          Width = 80
          ReadOnly = True
        end
        item
          FieldName = 'adds_address'
          Title.Alignment = taCenter
          Title.Caption = #22320#22336
          Width = 200
          ReadOnly = True
        end
        item
          FieldName = 'adds_attn'
          Title.Alignment = taCenter
          Title.Caption = #32852#31995#20154
          Width = 100
          ReadOnly = True
        end
        item
          FieldName = 'adds_tel'
          Title.Alignment = taCenter
          Title.Caption = #30005#35805
          Width = 100
          ReadOnly = True
        end
        item
          FieldName = 'adds_mobile'
          Title.Alignment = taCenter
          Title.Caption = #31227#21160#30005#35805
          Width = 100
          ReadOnly = True
        end
        item
          FieldName = 'adds_fax'
          Title.Alignment = taCenter
          Title.Caption = #20256#30495
          Width = 100
          ReadOnly = True
        end
        item
          FieldName = 'adds_mobile'
          Title.Alignment = taCenter
          Title.Caption = #31227#21160#30005#35805
          Width = 100
          ReadOnly = True
        end
        item
          FieldName = 'adds_flags'
          Title.Alignment = taCenter
          Title.Caption = #29366#24577
          Width = 50
          ReadOnly = True
        end>
    end
  end
  object zqcli_mst: TZQuery
    Connection = UniMainModule.zDB
    SortedFields = 'cli_no'
    ReadOnly = True
    SQL.Strings = (
      'select'
      '  C.*, A.*'
      'from cli_mst as C'
      '  left join ('
      '    select * from adds_mst'
      '    where adds_flags = 1'
      '  ) as A'
      '    on (C.cli_snowflake = A.adds_class_snowflake)'
      'where C.cli_snowflake > 0'
      
        '  and cast(cast(C.cli_flags as bit(8)) & cast(1 as bit(8)) as in' +
        'teger) = 1')
    Params = <>
    IndexFieldNames = 'cli_no Asc'
    Left = 248
    Top = 160
    object zqcli_mstcli_snowflake: TLargeintField
      DisplayLabel = 'ID'
      FieldName = 'cli_snowflake'
      ReadOnly = True
    end
    object zqcli_mstcli_site_flags: TIntegerField
      DisplayLabel = #32452#32455
      FieldName = 'cli_site_flags'
      Required = True
    end
    object zqcli_mstcli_no: TWideStringField
      DisplayLabel = #23458#25143#32534#21495
      FieldName = 'cli_no'
      Required = True
      Size = 16
    end
    object zqcli_mstcli_name: TWideStringField
      DisplayLabel = #23458#25143#21517#31216
      FieldName = 'cli_name'
      Required = True
      Size = 64
    end
    object zqcli_mstcli_short_name: TWideStringField
      DisplayLabel = #31616#31216
      FieldName = 'cli_short_name'
      Size = 24
    end
    object zqcli_mstcli_area_snowflake: TLargeintField
      DisplayLabel = 'Area ID'
      FieldName = 'cli_area_snowflake'
      ReadOnly = True
    end
    object zqcli_mstcli_area_no: TWideStringField
      DisplayLabel = #29255#21306#32534#21495
      FieldName = 'cli_area_no'
      Required = True
      Size = 8
    end
    object zqcli_mstcli_area_name: TWideStringField
      DisplayLabel = #29255#21306#21517#31216
      FieldName = 'cli_area_name'
      ReadOnly = True
      Size = 24
    end
    object zqcli_mstcli_off_snowflake: TLargeintField
      DisplayLabel = 'Office ID'
      FieldName = 'cli_off_snowflake'
      ReadOnly = True
    end
    object zqcli_mstcli_off_no: TWideStringField
      DisplayLabel = #22806#21150#32534#21495
      FieldName = 'cli_off_no'
      Required = True
      Size = 8
    end
    object zqcli_mstcli_off_name: TWideStringField
      DisplayLabel = #21150#20107#22788#21517#31216
      FieldName = 'cli_off_name'
      ReadOnly = True
      Size = 24
    end
    object zqcli_mstcli_pre_contract: TWideStringField
      DisplayLabel = #21069#32512
      FieldName = 'cli_pre_contract'
      Size = 2
    end
    object zqcli_mstcli_contract: TWideStringField
      DisplayLabel = #31614#32422#24207#21495
      FieldName = 'cli_contract'
      Size = 1024
    end
    object zqcli_mstcli_special_a: TWideStringField
      DisplayLabel = #31614#32422#20195#29702#20215
      FieldName = 'cli_special_a'
      Size = 16
    end
    object zqcli_mstcli_special_b: TWideStringField
      DisplayLabel = #31614#32422#22806#20215#26684
      FieldName = 'cli_special_b'
      Size = 16
    end
    object zqcli_mstcli_flags: TIntegerField
      DisplayLabel = #29366#24577
      FieldName = 'cli_flags'
      ReadOnly = True
    end
    object zqcli_mstcli_adds_snowflake: TLargeintField
      DisplayLabel = #40664#35748#22320#22336' ID'
      FieldName = 'cli_adds_snowflake'
      ReadOnly = True
    end
    object zqcli_mstadds_snowflake: TLargeintField
      DisplayLabel = 'Adds ID'
      FieldName = 'adds_snowflake'
      ReadOnly = True
    end
    object zqcli_mstadds_class_snowflake: TLargeintField
      FieldName = 'adds_class_snowflake'
      ReadOnly = True
    end
    object zqcli_mstadds_province: TWideStringField
      DisplayLabel = #30465
      FieldName = 'adds_province'
      ReadOnly = True
      Size = 64
    end
    object zqcli_mstadds_locality: TWideStringField
      DisplayLabel = #24066
      FieldName = 'adds_locality'
      ReadOnly = True
      Size = 64
    end
    object zqcli_mstadds_county: TWideStringField
      DisplayLabel = #21306'('#21439')'
      FieldName = 'adds_county'
      ReadOnly = True
      Size = 64
    end
    object zqcli_mstadds_address: TWideStringField
      DisplayLabel = #22320#22336
      FieldName = 'adds_address'
      ReadOnly = True
      Size = 256
    end
    object zqcli_mstadds_attn: TWideStringField
      DisplayLabel = #32852#31995#20154
      FieldName = 'adds_attn'
      ReadOnly = True
      Size = 32
    end
    object zqcli_mstadds_tel: TWideStringField
      DisplayLabel = #30005#35805
      FieldName = 'adds_tel'
      ReadOnly = True
      Size = 32
    end
    object zqcli_mstadds_mobile: TWideStringField
      DisplayLabel = #31227#21160#30005#35805
      FieldName = 'adds_mobile'
      ReadOnly = True
      Size = 32
    end
    object zqcli_mstadds_fax: TWideStringField
      DisplayLabel = #20256#30495
      FieldName = 'adds_fax'
      ReadOnly = True
      Size = 32
    end
    object zqcli_mstadds_email: TWideStringField
      DisplayLabel = #37038#31665
      FieldName = 'adds_email'
      ReadOnly = True
      Size = 32
    end
    object zqcli_mstadds_flags: TIntegerField
      DisplayLabel = #29366#24577
      FieldName = 'adds_flags'
      ReadOnly = True
    end
  end
  object dscli_mst: TDataSource
    DataSet = zqcli_mst
    Left = 304
    Top = 160
  end
end
